home *** CD-ROM | disk | FTP | other *** search
/ PC-SIG: Essential Home & Business / PC-SIG - Essential Home and Business Collection.iso / 26 / 4 / 6 / MERCURYZ.EXE / GCD.EKA < prev    next >
Text File  |  1991-07-01  |  283b  |  14 lines
  1. ; Demo of external functions.
  2.  
  3. ; GCD computes the greatest common divisor of two numbers.
  4. EXTERNAL GCD
  5. ; ASINH is the inverse hyperbolic sine.
  6. EXTERNAL ASINH
  7.  
  8. ; correct answer is 7
  9. a = GCD(156562431911123, 442677773754356)
  10.  
  11. ; should get c = PI
  12. b = SINH(PI)
  13. c = ASINH(b)
  14.